home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 050 / madtrb4.arc / KAVAIL.PAS < prev    next >
Pascal/Delphi Source File  |  1984-12-02  |  331b  |  8 lines
  1. {@@@@@@@@@@@ copyright (C) 1984 by Neil J. Rubenking @@@@@@@@@@@@@@@@@@@@@@@@
  2. The purchaser of these procedures and functions may include them in COMPILED
  3. programs freely, but may not sell or give away the source text.}
  4.  
  5. {$I kavail.lib}
  6. begin
  7.   WriteLn('You have ',K_available,'K of memory available at this moment.');
  8. end.